home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 39
/
Aminet 39 (2000)(Schatztruhe)[!][Oct 2000].iso
/
Aminet
/
mus
/
misc
/
spcli.lha
/
SongPlayerCLI
/
SpCLI
< prev
next >
Wrap
AmigaDOS Script File
|
2000-08-23
|
1KB
|
81 lines
.key COMMAND,OPTION
.bra {
.ket }
If {COMMAND} EQ "START"
RunSongPlayer
Endif
If {COMMAND} EQ "QUIT"
RX REXX:SpCLI/Quit.rexx
ENDIF
If {COMMAND} EQ "NEXT"
RX REXX:SpCLI/Next.rexx
Endif
If {COMMAND} EQ "FIND"
RX REXX:SpCLI/Find.rexx {OPTION}
Endif
If {COMMAND} EQ "PREV"
RX REXX:SpCLI/Prev.rexx
Endif
If {COMMAND} EQ "COUNT"
RX REXX:SpCLI/Count.rexx
Endif
If {COMMAND} EQ "STOP"
RX REXX:SpCLI/Stop.rexx
Endif
If {COMMAND} EQ "PLAY"
RX REXX:SpCLI/Play.rexx
Endif
If {COMMAND} EQ "INFO"
RX REXX:SpCLI/Info.rexx
Endif
If {COMMAND} EQ "FIRST"
RX REXX:SpCLI/First.rexx
Endif
If {COMMAND} EQ "LAST"
RX REXX:SpCLI/Last.rexx
Endif
If {COMMAND} EQ "SHOW"
RX REXX:SpCLI/Show.rexx
Endif
If {COMMAND} EQ "HIDE"
RX REXX:SpCLI/Hide.rexx
Endif
If {COMMAND} EQ "RANDOM"
RX REXX:SpCLI/Random.rexx
Endif
If {COMMAND} EQ "LIST"
RX REXX:SpCLI/List.rexx
Endif
If {COMMAND} EQ "SELECT"
RX REXX:SpCLI/Select.rexx {OPTION}
Endif
If {COMMAND} EQ ":O)"
ECHO " Why are you so happy?"
Endif
If {COMMAND} EQ "ADD"
RX REXX:SpCLI/Add.rexx {OPTION}
Endif
If {COMMAND} EQ "HELP"
RX REXX:SpCLI/Help.rexx {OPTION}
ENDIF
LAB endofscript